home *** CD-ROM | disk | FTP | other *** search
- # -*- mode: shell-script; sh-basic-offset: 8; indent-tabs-mode: t -*-
- # ex: ts=8 sw=8 noet filetype=sh
- #
- # bash programmable completion for various Common Lisp implementations by
- # Nikodemus Siivola <nikodemus@random-state.net>
-
- _sbcl()
- {
- local cur
-
- COMPREPLY=()
- cur=`_get_cword`
-
- # completing an option (may or may not be separated by a space)
- if [[ "$cur" == -* ]]; then
- COMPREPLY=( $( compgen -W '--core --noinform --help --version \
- --sysinit --userinit --eval --noprint --disable-debugger \
- --end-runtime-options --end-toplevel-options ' -- $cur ) )
- else
- _filedir
- fi
-
- return 0
- }
- complete -F _sbcl $default sbcl sbcl-mt
-